﻿using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Collections;
using Tibet.Entidades;
using Tibet.Logica.FabricaLogica;
using Tibet.Logica.Interfaces.MotorRegla;



namespace Tibet.Logica.Comandos.ComandoMotorRegla
{
    public class ConsultarEspacioParentesisCEF : ConsultarEspacioParentesis, IConsultarEspacioParentesis
    {
        public override void Ejecutar()
        /*Valida que todos los parentesis del archivo tengan espacios antes y despues del contenido.
          Ejemplo: FuncionEjemplo ( atributos ) {             
         */
        {
            //Variables iniciales
            int AnchoLinea; //Guardara el tamaño de cada linea del archivo.
            int i = 0;      //Contador de iteraciones para los ciclos (for).
            int LineaActual = 0; //Linea actual que se esta leyendo.
            Resultado Resp = new Resultado(); //Objeto resultado que sera retornado.

            //Inicializamos Resp asumiendo que el archivo cumple con la regla.
            Resp.Fecha = new DateTime();
            Resp.Fecha = DateTime.Now;
            Resp.Respuesta = true;
            Resp.Mensaje = "No se encontraron errores";
            Resp.Linea = 0;

            try
            {
                List<EntidadString> listaStr = new List<EntidadString>();

                for (int j = 0; j < ListaEntidad.Count; j++)
                {
                    listaStr.Add((EntidadString)ListaEntidad.ElementAt(j));
                }


                foreach (EntidadString linea in listaStr)   //Recorro la lista linea por linea
                {
                    LineaActual++;                //Aumenta el contador de la linea.
                    if (linea.Linea.Length != 0)        //Si la linea no esta vacia.
                    {
                        AnchoLinea = linea.Linea.Length;//Guardamos la cantidad de espacios de la linea.
                        i = 0;                    //Reiniciamos el contador.
                        while (i < AnchoLinea)    //Recorremos la linea caracter por caracter.
                        {
                            if (linea.Linea[i] == '(') // Si encontramos un abrir parentesis.
                            {
                                if (i == 0) //Checkeamos que podamos preguntar por la pasicion [i-1]
                                {
                                    Resp.Linea = LineaActual;
                                    Resp.Respuesta = false;
                                    Resp.Mensaje = "No existe espacio antes de un parantesis en la linea " + LineaActual;
                                    Entidad = (Resp as Entidad);
                                }
                                else if (linea.Linea[i - 1] != ' ') //Checkeamos que exista un espacio antes del parentesis.
                                {                        //En caso de no existir llenamos el resultado con la informacion de error.
                                    Resp.Linea = LineaActual;
                                    Resp.Respuesta = false;
                                    Resp.Mensaje = "No existe espacio antes de un parantesis en la linea " + LineaActual;
                                    Entidad = (Resp as Entidad);
                                    
                                }
                                if (i + 1 > AnchoLinea) //Checkeamos que podamos preguntar por la pasicion [i+1]
                                {
                                    Resp.Linea = LineaActual;
                                    Resp.Respuesta = false;
                                    Resp.Mensaje = "No existe espacio despues de un parantesis en la linea " + LineaActual;
                                    Entidad = (Resp as Entidad);
                                }
                                else if (linea.Linea[i + 1] != ' ')
                                {
                                    //Checkeamos que exista un espacio despues del parentesis.
                                    //En caso de no existir llenamos el resultado con la informacion de error.
                                    Resp.Linea = LineaActual;
                                    Resp.Respuesta = false;
                                    Resp.Mensaje = "No existe espacio despues de un parantesis en la linea " + LineaActual;
                                    Entidad = (Resp as Entidad);
                                }
                            }
                            if (linea.Linea[i] == ')')  //Si encontramos un cerrar parentesis.
                            {
                                if (i == 0) //Checkeamos que podamos preguntar por la pasicion [i-1]
                                {
                                    Resp.Linea = LineaActual;
                                    Resp.Respuesta = false;
                                    Resp.Mensaje = "No existe espacio antes de un parantesis en la linea " + LineaActual;
                                    Entidad = (Resp as Entidad);
                                }
                                else if (linea.Linea[i - 1] != ' ')  //Checkeamos que exista un espacio antes del parentesis.
                                //En caso de no existir llenamos el resultado con la informacion de error.
                                {
                                    Resp.Linea = LineaActual;
                                    Resp.Respuesta = false;
                                    Resp.Mensaje = "No existe espacio antes de un parantesis en la linea " + LineaActual;
                                    Entidad = (Resp as Entidad);
                                }

                                if (i + 1 < AnchoLinea)  //Aseguramos que se pueda preguntar por la posicion [i+1]
                                    if (linea.Linea[i + 1] != ' ')  //Checkeamos que exista un espacio antes del parentesis.
                                    //En caso de no existir llenamos el resultado con la informacion de error.
                                    {
                                        Resp.Linea = LineaActual;
                                        Resp.Respuesta = false;
                                        Resp.Mensaje = "No existe espacio despues de un parantesis en la linea " + LineaActual;
                                        Entidad = (Resp as Entidad);
                                    }


                            }
                            i++;
                        }
                    }


                }

                Entidad = (Resp as Entidad);//Retornamos respuesta.
            }
            catch (Exception e)
            {
                Resp.Linea = LineaActual;
                Resp.Respuesta = false;
                Resp.Mensaje = "Ocurrio un error inesperado al leer la linea " + LineaActual + ". Error " + e.Message;
                Entidad = (Resp as Entidad);
            }
        }

    }
}
